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Abstract 

We study the correspondence between a concurrent lambda-calculus in administrative, 
continuation passing style and a pi-calculus and we derive a termination result for the 
latter. 



1 Introduction 



I There are two complementary explanations of the vr-calculus. The first one is to regard it 

] as an extension of a rather standard process calculus such as CCS while the second one 

is to present it as an intermediate language for compiling higher-order languages including 
various imperative/concurrent extensions of A-calculi and object-oriented calculi. The first 
I view was put forward in the original presentation [10] and explains the transfer of effective 

operational semantics techniques from CCS to the vr-calculus. The second view gradually 
emerged through a series of encodings starting from, e.g., [8] and it explains the expressivity 
of the calculus while providing guidance in selecting its essential aspects. 
^ ■ Taking the second view, it has been stressed (see, e.g., [1]) that the translations from the 

^ . A-calculus to the vr-calculus can be understood as the composition of two familiar compilation 

techniques. In the first step, the A-term is put in an administrative form (AF) where all values 
are explicitly named and in the second one a continuation passing style ( CPS) translation is 
applied so that the evaluation contexts are passed explicitly as an argument. 

We note that neither the notion of administrative form nor that of CPS translation are 
canonical. Our purpose here is to provide a concrete presentation of this approach for a 
call- by- value A-calculus and then for a parallel and concurrent extension of it. We show 
that the two compilation steps commute nicely with the reduction relations and the typing 
disciplines. Moreover, we identify languages which contain the image of the compilation and 
are isomorphic to natural fragments of the vr-calculus. The situation is summarized in table 
[1] where the A-calculi in administrative form play a prominent role since on one hand the 
ordinary A-calculi can be regarded as a retraction of the administrative ones (symbol <) and 
on the other hand they contain sub-calculi (symbol d) in CPS form which are isomorphic 
(symbol =) to vr-calculi. Also it is at this level, that it is natural to introduce a notion of 
concurrent access to a resource, i.e., a definition. In this framework, one can decompile terms 
of the TT-calculus into familiar A-terms. As an application of the correspondence, we show 
that the termination of a (concurrent) A-calculus entails the termination of a corresponding 
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Table 1: Overview of calculi and their relationships 



(concurrent) vr-calculus. Section [2] covers the functional case, section [3] generalizes it to the 
parallel and concurrent case, and section H] makes explicit the correspondence with the vr- 
calculus. Omitted specifications, some concurrent programming examples, and proof sketches 
of the main results are available in appendices El El and [Cl respectively. 

Related work This work arises out of a long term effort of presenting the vr-calculus to an 
audience familiar with the A-calculus but not necessarily with process calculi. We tried this 
first in the context of a book [3] and then more recently in the context of a graduate course 
[2]. The application to termination appears as a natural test for the presented compilation 
techniques and can be regarded as a natural continuation of recent work on the termination of 
(higher-order) concurrent calculi. In this respect, we find it remarkable that in the presented 
approach one can drop completely the notion of stratified region [H [H [I3l [6] . As far as the 
vr-calculus is concerned, we believe the presented approach complements those described in 
\14:\ [T2] in that we reduce the termination of a fragment of the vr-calculus to the termination 
of the A-calculus by 'elementary' means. In particular, we do not need to develop reducibility 
candidates/logical relations techniques for the vr-calculus, nor do we require specific knowledge 
of the operational semantics of the vr-calculus. 

Requirements The reader is supposed to be acquainted with the simply typed A-calculus, 
see, e.g., [7], its evaluation strategies and continuation passing style translations, see, e.g., 
and to have some familiarity with the syntax of the vr-calculus, see, e.g., [9] and its 
reduction semantics. We shall make no use of the so called labelled transition systems and 
related notions of bisimulation. 

Renaming In the following calculi, all terms are manipulated up to a-renaming of bound 
names. Whenever a structural congruence or a reduction rule is applied, it is assumed that 
terms have been renamed so that all binders use distinct variables and these variables are 
distinct from the free ones. Similar conventions are applied when performing a substitution, 
say [T/x]T' , of a term T for a variable x in a term T\ We denote with FV{T) the set of 
variables occurring free in a term T. 

Syntax, Structural congruence, Reduction, and Typing For each calculus, we specify 
the syntactic categories, the notion of structural congruence, the reduction rules, and the 
typing rules. In all calculi, we assume a syntactic category id of identifiers (or variables) 
which we denote with x,y,z,.... Structural congruence is the least equivalence relation, 
denoted with =, which is induced by the displayed equations, a-renaming (which is always 
left implicit), and closed under the operators of the language. The reduction relation is the 
least binary relation — > that includes the pairs given by the rewriting rules and such that 
M ^ N if M = M' N' = N. The basic judgment of the typing rules assigns a type to 
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= * I {Xid.M) I id 
= V II (MM) 
= []\E[[ ]M] II E[V[ ]] 
= l\iA^A) 



(values) 
(terms) 

(eval. contexts) 
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Reduction rule 
E[{\x.M)V] E[[V/x]M] 
Typing 



x: Aer 



(A) 



Th x: A 

r,x : Ah M : B 
r h \x.M -.A-^B 



(*) 



(@) 



r h * : 1 

T\- M -.A^ B rh N : A 
r I- MN : B 



Table 2: A simply typed, call-by-value A-calculus: A 



a term in a context T. The latter is a function mapping a finite set of variables to types. 
When writing F, x : ^4 it is assumed that x is not in the domain of definition of F. In the 
parallel/concurrent extensions we distinguish between value types and types. The latter are 
composed of value types plus a distinct behavior type b. Terms of a behavior type do not 
return a result. As such a behavior type cannot occur in a context or as the type of the 
argument of a function. 

Vectorial notation We shall write i^*) for a non-empty (possibly empty) finite se- 
quence Xi, . . . , Xn of symbols. By extension, Xx~^.M stands for Xxi . . . Xxn-M , — )■ B 

stands for (^i ^ > [A^^ B)---), [V+/x+]M stands for [Vi/xi]{- ■ ■ [K/xjM ■■■),x+ : 

A+ stands for xi : ^i, . . . , x„ : F h M+ : A+ stands for F h Mi : Ai, . . . , F h M„ : 
and let {x = V)^ in M stands for let xi = Vi \n ■ ■ ■ let x„ = Vn in M. 

2 The functional case 

In this section we explore the functional case, namely the upper part of table [H This has at 
least two advantages: first one can get an idea of the approach in a simple familiar framework 
and second it clarifies the additions to be made to achieve parallelism and concurrency. 

A A-calculus To start with we introduce in table [2] a standard, simply typed, call-by- value 
A-calculus (A). We specify, syntax, reduction and typing rules. We follow this pattern in the 
following calculi too, possibly adding the specification of a structural congruence. 

A A-calcuIus in administrative form A corresponding calculus in administrative form 
(A") is presented in table [3l The basic idea is to attribute a name to each value and to 
compute by replacing names with names. Notice that in A" we restrict the values in a let 
definition to be either abstractions or constants Beyond values and terms, we introduce a 
new syntactic category of 'declarations' which are terms possibly preceded by a list of value 
declarations. Strictly speaking the application only applies to terms, however if Di = let (xj = 
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Syntax 



V 


:■- * II (Xid+.D) 


(values) 


D 


:■- let {id = Vy in M 


(declarations) 


M 


:■- id 1 @{M,M+) 


(terms) 


E 


:■- let {id ^Vy \n[]\ E[@{id* , [ ], M')] 


(eval. contexts) 


A 


■.■.= J\f{l)\J\f{A+ A) 


(types) 



let xi — Vi in let X2 = V2 D 
= let X2 = V2 in let xi = Vi in D 

if ^ FV{V2),X2 i FV{Vx) 



Structural Congruence 
(egj) let x\ — Vi in let X2 = V2 in D (eg2) \et x — V \n D = D 

if X ^ FV{D) 

Reduction rule 
£;[let X = Xy+.D in E'[@{x,z+)]] E[\et x = Xy+.D in E'[[z+ /y+]D]] 
Typing 

2: : A e r 



r,g : A/'(l) \- D:A 
rh" let a; = * in _D : 



(A") r,g : A/'(v4+ ^ C) \-"- D:B 
r h" let X = Ay+.D' in D : B 



r h" A/ : J^{A+ ^ B) 
(@") n-" jV+ : A+ 

r @(A/,Af+) : B 



Table 3: The A-calculus in administrative form: A*^ 



Vi)* in Mj, for z = 1, . . . , n, then we regard @{Dq, Di, . . . , Dn) as an abbreviation for let (xq = 
Vo)* in • • • let (x„ = Vn)* in @(Mo, . . . , M„) (the order of the declarations is immaterial up to 
structural congruence). Similar care is needed when substituting a declaration D = let {x = 
V)* in M in an evaluation context E. We remark that E can be written as let {x' = V')* in E' 
where E' does not start with a let declaration. Then by E[D\ we mean the declaration 
let {x = VY in let (x' = V')* in £''[M] where it is intended that the names x'* do not occur 
free in fl 

We use M{A) for the type of names carrying values of type A; as the reader might have 
guessed these names correspond to the channel names of the 7r-calculus. The A"-calculus is 
polyadic in the sense that the application may have any finite, positive number of arguments. 
This choice allows to represent directly the following CPS translation as a translation from 
the A" calculus to a fragment of the A" calculus in 'CPS form' and moreover the latter 
corresponds directly to a polyadic 7r-calculus. Nevertheless, we notice that the A^-calculus 
contains a monadic sub-calculus that we denote with A°"^ where the types are restricted as 
follows: 

A ::= J\f{l) II M{A A) (monadic types) 

This sub-calculus is closed under reduction (provided we consider typable terms) and it suffices 
to encode the simply typed A-calculus. 

Back and forth between A and A" In table HJ we introduce a translation of A-terms to 
administrative forms along with a readback translation. Clearly, there are A'^-terms which are 

^There is an alternative presentation where declarations and applications can be inter-mixed freely; we 
found the current presentation more handy for our purposes. 
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Translation in AF 



B = Af(A B) 
\x.M = let a; = Xx.M in x 



X — X 



* = let a; = * in a; 



MiV = @(M,iV) 



Readback 



x° = x 



7V(1)° = 1 N{Ai > Ak^ B)° = Al^ > Al^ B° 

*° = * (Ay+.D)° = Ay+.D° 
(let x = V \n D)° = [V°/x]D° @{M,Ni, ...,Nk)° ^ M° N1 ■ ■ ■ 



Table 4: Translation in administrative form and readback 



not structurally equivalent but are mapped to the same A-term by the readback translation. 
For instance, taking: V = Az.z, M = \et x = V in and N = \et x = V m \et y = 

V in we have that M ^ in A" but M° = N° in A. Thus we can regard the 

administrative forms as notations for A terms which differ in the amount of value sharing. 
Conversely, given a A-term such as VV, we can associate with it an administrative form 
VV = @(let X = V \n x,\et y = V \n y) = N. Thus the translation (_) in administrative form 
makes no effort to share identical values. The translation and the related readback function 
form a retraction pair which is 'compatible' with typing and reduction in a sense that is made 
formal below. Thus, we can look at the A-calculus as a retract of the A" calculus. 

In establishing the simulations between A and A'^ we cannot work directly with the trans- 
lation (_). For instance, taking M = {Xx.x{xy)){\z.z), we have M — >■ M' in A and M -/^ M' . 
Indeed in M' the term Xz.z is duplicated while its translation is shared in M' . We get around 
this difficulty by working with the readback operation. 

Theorem 1 (read-back translation, functional case) The following properties hold. 



1. 


If Di = D2 in A" then Dl = in A. 




2. 


If M is a term in A then M° = M . 




3. 


IfTh M :AinX then F h-^™ M : ^ m A'^. 




4- 


// F : ^ m A" then F° h Z)° : A° in A. 




5. 


// F L»i : A, Ml = DI and Di D2 in A" then Mi - 


> M2 in X and M2 = D^. 


6. 


If F h''"' Dl : A, Ml = Df and Mi ^ M2 in X then Di - 


D2 in A"™ and M2 = D^ 



The first property states that the readback translation is invariant under structural con- 
gruence and the second that it is the left inverse of the function that puts a A-term in 
administrative form. The third and fourth properties state that typing is preserved by the 
translations. The fifth property shows that any reduction in A" corresponds to a positive 
number of reductions of the readback in A (hence the following corollary) . Finally, the sixth 
property guarantees that the monadic administrative forms are indeed enough to simulate 
the A-calculus. 

Corollary 2 The X"'-calculus terminates. 
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Restricted CPS Syntax 



V 
D 

M 
E 
A 



■- * II (Xid+.D) 

— let {id = vy 

— @(id,id+) 

— let [id = vy 

:=AA(1) |AA(A+ 



in M 



R) 



(values) 

(declarations) 

(terms) 

(eval. contexts) 
(types) 



Specialized typing rules 
hD:R X : 7V(A+ 



r h' 



(A- 



let a; = 



* in i3 : i? 



(©") 



i^),y+:^+gr 



r @{x,y+) : R 



r let X = A1/+.L1' in D : _R 



Table 5: Administrative forms in CPS style: A"^ 

W) =AA(1^ _ 

AA(Ai ^ ^ A„ ^ B) = Af{Ai >A^^ K{B) R) 

where: K{B) = N{B R) 



^(*) 

^{\y+.D) 

let (a; = V")* in M : fc 
@{x*,@{M,M+),N*) 
@(x,a;+) : A; 
2; : k 



= Xy+.Xk.{D : k) 
= let (x = ^{y)y m M -.k 
k = let k' = XyM{x*,y, N*) : k \n @(M, M+) : it' 
= ©(Xja;"*", k) 
= @(fc,a;) 



Table 6: An optimized CPS translation on the administrative forms 



Administrative forms in CPS style In table [5] we consider a restriction of the syntax of 
the terms where we drop variables (functions are always applied to their arguments) and the 
operator @ is only applied to variables. Evaluation contexts are then restricted accordingly. 
The definition of structural congruence and reduction are inherited from A° and are omitted. 
We restrict the syntax of types too by requiring, as it is common in CPS translations, that 
there is a fixed type of results called R. The resulting language is called A"'^ and it is a 
subsystem of A" which inherits from A° the reduction and typing rules. In particular, the 
terms in A"'^ terminate because those in A" do. 



CPS translation In table El we describe a CPS translation of the administrative language 
A" into A"^. The reader familiar with CPS translations, may appreciate the fact that the 
translation has been optimized so as to have a simple statement and proof of the simulation 
property. In particular, notice that the case for application is split into two cases. 

Theorem 3 (CPS translation, functional case) The following properties hold. 

1. IfTh'' D : A then f, k : K{A) {D : k) : R. 

2. IfTh'^D-.AandD^ D' in then {D : k) 4 {D' : k) in X"'' . 



6 



Syntax 



V 

M 
E 
A 



a 



* II (Xid.M) II id 

V II (MM) \{M \M) 

[ ] II E[[ ]M II E[V[ ]] \E[[]\ M] I E[M \ [ ]] 

1 II (A ^ a) 

A\b 



(values) 
(terms) 



(aval, contexts) 
(value types) 
(types) 



New typing rule 



(I) 



ThMi-.b i = l,2 



r h (A/i I Ma) : b 



Table 7: Sketch of a parallel A-calculus: A 



3 Parallel and Concurrent extensions 

In this section, we explore the more general concurrent case, namely the lower part of table 



A parallel A-calculus In table Q we introduce a parallel version of the A-calculus (cf. 
appendix |Al table [TO]) . This amounts to introduce a binary parallel composition operator on 
terms along with a special behavior type h which is attributed to terms running in parallel. 
The reduction rule and the typing rules {id), (*), (A), (@) are omitted since they are similar 
to the ones in table El Terms running in parallel are not supposed to return a value. The 
typing guarantees that they cannot occur under an application (neither as a function nor as 
an argument). Notice that in this language terms running in parallel are not really competing 
for the resources, i.e., the value declarations. This is because values are always available and 
stateless (for this reason we call this calculus parallel rather than concurrent). An interesting 
remark is that the termination of the parallel A-calculus can be derived from the termination 
of the simply typed A-calculus. 

Proposition 4 The \\\-calculus terminates. 

A concurrent A-calculus in administrative form In table [8] we sketch an extension 
of the administrative A-calculus to accommodate the parallelism already introduced in the 
A-calculus (cf. appendix |Al table [TT]) . Thus once again we introduce parallel terms and a 
special behavior type h. In order to have a form of concurrency or competition among the 
parallel threads we associate a usage u with each declaration. A usage u varies over the set 
{oo,l,0}. The (familiar) idea is that a declaration with usage oo is always available, one 
with usage 1 can be used at most once, and one with usage cannot be used at all. We 
take the convention that when the usage is omitted the intended usage is oo. We define an 
operator J, to decrease usages as follows: i oo = oo, J, 1 = 0, and J, is undefined. Modulo 
this enrichment of the declarations with usages, the structural congruence is defined as in the 
functional fragment of the language (table [3|) and it is omitted. Notice that a reduction is 
possible only if the usage of the corresponding definition is not and in this case the effect of 
the reduction is to decrease the usage. We omit the typing rules {id'^), (*"), and (@") which 
are similar to the ones in table [3l 
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Syntax 



V 


:■- * 1 {\id+.D) 




(values) 


D 


:■- let„ {id = V)* in M 




(declarations) 


M 


■■- id 1 @{M,M+) 1 (M 


M) 


(terms) 


E 


:-let„ {td = Vy in []| 


Em^d*,[],An]\E[[]\AI]\E[M\[]] 


(eval. contexts) 


A 


■.■-Ar(i)\Ar{A+ ^ q) 




(value types) 


a. 


A II 6 




(types) 



Reduction rule 



(/3^) E[\eU X = \y+.D in E'[@{x, z+)]] ^ £[let;„ a; = Ai/+.L» in E'[[z+ /y+]D]] 

New typing rules 

/ r, y+ : yl+ h" D' : qT a : AA(yl+ a') h° i3 : q 
*^ ^ r let„ X = Ay+.D' in D : a 

1//* r,a:A^(A+^Q')h°D:a T h" : b »^1,2 

O'' r leto X- = 1/ in D : a T (Mi | A/2) : b 

Table 8: Sketch of a concurrent A-calculus in administrative form: A|| 

In the typing, we require that in let^ x = * \n D, uis oo. Also notice that in leto x = V '\n D 
we disregard the typing of the value V. Given a declaration D, we can obtain a declaration 
D' by replacing all the usages with the usage oo. It is clear that all reductions D may perform 
can be simulated by D'. If the transformation must respect typing then we can just replace 
the possibly ill-typed values in leto by some well-typed value. Then, as far as termination 
is concerned, it is enough to consider the sub-calculus where all usages are oo; we denote 
this calculus with Am • The administrative translation and the related readback translation 
described in table HI are extended to provide a retraction pair between the Ay and the Ajj^ 
calculi. The translations are the identity on the behavior type b and distribute over parallel 
compositions (cf. appendix El table [T2]) : 

b =b M I M' ^ M_\Mi (translation in AF) 

b° =6 (Ml I Ma)" = Mi° I Afl (readback) 

Theorem 5 (read-back translation, parallel case) The following properties hold. 

1. IfDi = D2 in A|^ then = in A. 

2. If M is a term in Ay then M° = M. 

3. IfTh M -.a in Ay then £ h"^™ M : a m Ajj™. 

4. If T l-"" D : a in A^f then r° h D° : q° in An . 
^ •' 11,00 II 

5. If IfV h'^ Di -.a, Mi = Dl and Di D2 in A||^^ then Mi 4 M2 in Ay and M2 = D^. 

6. IfV h"^"* Di : a in A||'J^, Mi = DI and Mi M2 in Ay then Di D2 in A||"^ and 
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Restricted CPS Syntax 



V 


■■- * 1 (Xid+.D) 


(values) 


D 


::= let„ {id = V)* in M 


(declarations) 


M 


::= @{id,id+) 1 (M 1 M) 


(terms) 


E 


::= let„ {id = V)* in [ ] || E[[ ] | A/] || E[AI \ [ ]] 


(eval. contexts) 


A 


■.■.= J\f{l)\Af{A+ ^b) 


(types) 



New specialized typing rules 

T,y+ : A+ h'' D' -.b r,x : JV{A+ b) h"" D : b 
r let„ X = \y+.D' \n D:b 



V ^* r,x: Af{A+ ~> fe) h° D : fe r\-M,:b i ^ 1,2 

r l-° leto X = 1/ in D : 6 ^' ^ T h (A/i | A/a) : 6 



Table 9: Sketch of the concurrent administrative forms in CPS style: A||'^ 

By theorem [5]^5), a reduction of a term in Ay ^ corresponds to a positive number of 
reductions of the readback in A|[. Hence, by recalling proposition SI we obtain the following 
corollary (cf. appendix [B] for concurrent programming examples). 

Corollary 6 The X^y calculus terminates. 

Concurrent A-calculus in administrative, CPS form In table O we introduce the 
concurrent A-calculus in administrative and CPS form (cf. appendixjAj table [T3l) . The typing 
rules and (@") are omitted as they are similar to the ones in tableO The CPS translation 
given in table [6] is extended to a translation from Ay to Ay*^. The behavior type is mapped to 

itself, b = b, with a continuation type K{b) which is conventionally taken to be A/'(l), while 
the optimized term translation distributes over parallel composition (M \ M') : k = [M : k) \ 
(M' : k) (cf. appendix 1^1 table [T^. Then typing and reduction are preserved as follows. 

Theorem 7 (CPS translation, concurrent case) The following properties hold. 

1. IfT}-" D : a in A|[ then T,k : K{a) {D : k) : b in \f. 

2. IfTh'^D-.aandD^ D' in A|| then {D : k) ^ {D' : k) in \f . 

4 Correspondence with the 7r-calculus 

In this section we consider the correspondence between the A||''-calculus and the vr-calculus. 
To this end, we introduce the syntax of a vr-calculus, vr, where we write {. . .} to mean that the 
symbols between curly brackets are optional. The 'functional' version of this calculus (called 
TTj in table [1]) is obtained by dropping the (non-replicated) input prefix from the syntax and 
it corresponds to the functional administrative CPS forms (table [5]). 



D 

M 
E 
A 



= uid D II uid {id{id+).D \ D) \ vid {\id{id+).D | -D) || Af (declarations) 

= 'id{id+) \{M\M) (terms) 

= [ ] II E[vid{[ ])] II E[vid{{\}id{id+ .D \ [])\E\[] \ M] \ E[M \ [ ]] (eval. contexts) 

= Ch{l) I Ch{A+) (types) 
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The following table provide a correspondence (a bidirectional translation) between Ajj*^ 
and TT. Notice that declarations of the shape letoo x = * '\n D and leto x = V '\rt D both 
correspond to declarations I'x D. The structural congruence, the reduction rules, and the 
typing rules of vr,. are exactly those of Ay''" modulo this correspondence (cf. appendix El table 





A"" 


TV 


Types 


m) 


Ch{l) 




AfiA+ ^ b) 


Ch{A+) 


Terms 


letoo X = Xy^.D in D' 


vx [\x{y+).D 1 D') 




leti X = Xy+.D in D' 


vx {x{y+).D 1 D') 




leto X — V \n D 


ux D 




letoo 2: = * in _D 


vx D 




M 1 M' 


M 1 M' 




@{x,y+) 


xy+ 



When applying the translation from vr^. to Ay it is intended that: (i) D does not contain 
a (possibly replicated) input prefix on the declared name x and (ii) the typing determines 
the appropriate translation (recall that in Ay the typing of V is disregarded). The reader 
familiar with the vr-calculus will recognize that communication is asynchronous (there is no 
output prefix) and polyadic (we send vectors of names) and that for every (channel) name 
x there is at most one associated definition (a process, possibly replicated, ready to input 
on x). However these constraints are not enough to guarantee termination. For instance, 
consider the following looping processes of the (untyped) vr-calculus: Pi = vx {\x{y).xy \ xz), 
P2 = vx,x' {\x{y).x'y \lx'{y).xy \ xy). In the presented system, both processes are rejected, 
the first because the definition of x refers to itself and the second because the definitions of x 
and x' are mutually recursive. The syntactic constraints and the typing rules guarantee that 
the definitions can be linearly ordered so that each definition may only refer to previously 
defined names. 

Corollary 8 The typed t:- calculus vr described above terminates (cf. appendix table\15\). 

5 Conclusion 

We have introduced a simply typed concurrent A-calculus in administrative form, and shown 
that a fragment of this calculus in continuation passing style corresponds to a simply typed 
TT-calculus. As an application of the correspondence, we have derived a termination result for 
the vr-calculus. We expect that the current framework can be extended in various directions 
including: (i) polymorphic (second order) types, (ii) refinements towards linear logic/type 
systems, and (iii) a synchronous/timed variants of the concurrency model. 
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Syntax 



V 


:■- * 1 (Xid.M) 1 id 


(values) 


M 


■.■-VI (MM) 1 (M 1 M) 


(terms) 


E 


::=[]! E[[ ]M] \ E[V[ ]] 1 E[[ ]\M]\ E[M \ [ ]] 


(eval. contexts) 


A 


::=l|(A^a) 


(value types) 


a 


::= A 1 b 


(types) 



Reduction rule 



iPv) E[{\x.M)V] -> E[[V/x]M] 
Typing 

^ r h Xx.M ■.A^a r h MN : a 

r h : b i = l,2 
^'^ r h (Ml I Ma) : b 

Table 10: A parallel A-calculus: Ay 

A Full specifications 

This section contains the full specifications of the parallel/concurrent calculi and the related 
translations as tables [TOl [m [El [El [12 and [El 
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Syntax 



V 


:■- * 1 (Xid+.D) 


(values) 


D 


:■- let„ {td = V)* in M 


(declarations) 


M 


:■- id 1 @{M,M+) 1 (M 1 M) 


(terms) 


E 


let„ {id = Vy in [ ] 1 E[@{td* , [ ], M*)] || E[[ ] \ A/] || E[M \ [ ]] 


(eval. contexts) 


A 


■.~J\f(l)\J\f{A+ ^a) 


(value types) 


OL 


■.■-A\b 


(types) 



letuj xi = Vi in let„2 X2 = V2 \n D 
= \etu2 ^2 — Vi in letuj x\ = Vi in D 
ifxi ^ FY{V2),X2 i FV{Vi) 



Structural Congruence 

(egj) ietu x = V \n D = D 

\ixi FV{D) 
Reduction rule 

(13^) E[\etu X = Xy+.D in E'[@{x, z+)]] ^ E[\et^u x = \y+ .D in E'[[z+ /y+]D]] 

Typing 

a^:^er r,a::A/-(l)hZ?:a 

i**^ ) la ^ . . (* ) 



Fh" x: A V y p |_a ^ ^ ^ 



(A'') r:.:Ar(:^^a')h°D:a (Ag) ^ * T, . : Ar(A+ ^ a') : a 



r let„ X = Aj/+.D' in D : a 

r M : JV{A+ a) 
(@") r h° jV+ : A+ (I") 



r leto x = V \r\ D -.a 



Th^Mj-.b i = l,2 
r h" (Ml I M2) : fe 



r @(Af,iV+) : a 
Table 11: A concurrent A-calculus in administrative form: Aff 



Translation in AF 

l = ^f{'^) b = h A^a = NiA q) 

x_ = x ± = letoo a- = * in X Xx.M — \etoo x = Ai.M in x 
MK = ®{K,N) M \M' = M_\ M' 

Readback 

AA(1)° = 1 6° = 6 A/'(Ai ^ ^ ylfc ^ q)° = yl? ^ ^ ^ Q° 

*° = * (Ay+.D)° = Ay+.D° = a; 

(let^ a; = F in D)° = [V°/x]D° @{M, Ni,..., Nk)° = M°N? ■ ■ ■ 
(Ml I Ma)" = Ml I Ma" 

Table 12: Translation in administrative form and readback: parallel case 
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Restricted CPS Syntax 



V 


■■- * 1 {\id+.D) 


(values) 


D 


:■- let„ {id = Vy in M 


(declarations) 


M 


:■- @{td, id+) 1 (M 1 M) 


(terms) 


E 


::= let. (id = V)* in [ ] || E[[ ] \ M] | E[M \ [ ]] 


(cval. contexts) 


A 


::= A/'(l) 1 A/'(yl+ ^ 6) 


(types) 



Specialized typing rules 



r,x:M{l) \- D:b 
r h" letoo x = *\n D -.b 



r,y+ -.A+h^D'-.b 



(AS) 



(A") r,x:Af{A+ ^b)^" D:b 
r h" let„ s = Ay+.D' m D -.b 

T^Mi-.b i = l,2 



(O") 



V/* r, : 7V(A+ ^ 6) h" D : b 
r leto a: = F in D : 6 

X ■M{A+ b),y+ : A+ er 



r @{x,y+) : b 



in 



r h (Ml I Ma) : fe 

Table 13: Concurrent administrative forms in CPS style: An'^ 



b 



N{A^ 



■Mil) 

■- b 



An a) = Af{Ai ■■■ ^ An^ K{a) b) 

where; K{A) = U(A ^ b), K{b) = M(l) 



let. (a; = V")* in _D : 
(M \M'):k 

@{x*,@iM,M+),N*) : k 
@{x,x^) : k 
X : k 



Xy+.Xk.{D : k) 

let. {x = i^iV))* \n D -.k 

(A/ : k) I (M' : k) 

let. k' = XyM{x*,y,N*) : k in @{M,M+) : k' (u / 0) 

@(2;,a::+,A;) 

@{k,x) 



Table 14: An optimized CPS translation for the concurrent case 
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Syntax 



D 

M 
E 
A 



vid D I vid {id{id+).D \ D) \ vid {Hd{id+).D \ D) \ M (declarations) 

'id{id+) \{M\M) (terms) 

[ ] II E[uid{[ ])] II E[yid{{\}id{id+ .D \ [])\E[[] \ M] \ E[M \ [ ]] (eval. contexts) 

Ch{l) I Ch{A+) (types) 



Structural Congruence 

(egj vx^ ({{!}a;i(j/+).Z3i \}vx2 {{{\}x2{yt)-D2 \}D)) 
= vx2 {{{\}x2{yt)-D2 \}vx, {{{\}x^{yt).D, \}D)) 
if a;i i FV{Xy+.Di),X2 ^ FV{Xy+.D2) 

Reduction Rules 



(eq,) vx ({{!}a;(y+).i3' |}73) 
= D 
lixi FV{D) 



E[vx {\x{y+).D I E'[xz+])] E[vx {\x{y+).D \ E'[[z+ /y+]D])] 

E[vx {x{jj+).D\E'[xz+])] E[ux {E'[[z+ /y+]D])] 

Typing Rules 

K) tI'- vxD {y-^n-) T,x:CKA+)^- D 



r h'^ vx {{\}x{y+).D' I D) 



r h'' xy+ ' r h'^ (Ml I Ma) 

Table 15: A concurrent vr-calculus: vr 

B Expressivity 

This section illustrates the expressivity of the A|| -calculus (and therefore of the related Ay'^ and 
vr-calculi) as far as the programming of some familiar concepts in concurrent programming is 
concerned. 

B.l Output prefix 

An 'output prefix' @(x,y).D is simulated by the usual continuation passing trick: 

leti k = Xw.D in 

B.2 Internal choice 

We introduce an 'internal choice' operator © by defining M© as follows (all variables being 
fresh): 

let X = * in 
leti y = Xk.@{@{k,y),x) in 
leti ki = Xw.M in 
leti ^2 = Xw-N in 

myM)\HyM)) 
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B.3 External choice 

An 'external choice' between M and N based on a boolean value (coded as a projection) can 
be defined as follows: 

let X = * in 
leti y = Xz.@{@{z,\w.M,Xw.N),x) in 

B.4 Multiple definitions 

One can add to the language the possibility of having multiple definitions of the same name. 

let X = Vi or 
or 

X = Vn in • • • 

where Vi,...,Vn do not depend on x. This does not compromise termination because a 
multiple definition can be simulated by a unique definition that receives its arguments and 
then performs an internal choice among the n branches. 

B.5 Joined definitions 

One can also add to the language the possibility of having joined definitions (in the direction 
of Fournet and Gonthier join-calculus). 

let xi = Vi join 
join 

Xn = Vn in • • • 

where Vi can only depend on xi, . . . ,Xi-i. The intended semantics is that the definitions of 
be used only simultaneously. Clearly, a joined definition can be simulated by 
a usual one and thus the termination property is not compromised. 

B.6 Lock/Unlock 

One can use the joined definitions to define a lock/unlock mechanism: 

let X = * in 

let unlock = Xw. ■ ■ ■ join 

let lock = Xk.@{k, unlock) in 
{©{unlock, x) I M[lock]) 

Here M[lock] is composed of several threads that may invoke the lock definition. When the 
lock is acquired the thread receives the name unlock and invoking it amounts to release the 
lock (this is a rudimentary mechanism and no effort is made to to enforce a correct usage). 
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B.7 CCS channel manager 

Another possible use of the joined definitions is to define a CCS channel manager: 



let 
let 
let 



X 



in = Xk.@{k, x) join 
out = \k.@{k, x) in 
M[in, out] 



= * 



in 



Here M is composed of parallel threads trying to synchronize on a channel. 



C Proofs 



The functional case being a special case of the concurrent one, we focus directly on the proofs 
of the latter. There is one exception: in the concurrent case in administrative, CPS form we 
fix the type of results to be the behavior type b rather than an arbitrary (value) type R but 
this does not affect the structure of the proofs. 

C.l Proof of proposition [4] 

The simple idea idea is to simulate the Ay-calculus in an ordinary simply typed A-calculus 
equipped with a distinguished variable p of type (6 — )■ 6) — > b. More precisely, let Xp be a 
simply typed A-calculus with two basic types 1 and b, a constant *, and a distinguished variable 
p. It is well-known that such calculus terminates under an arbitrary reduction strategy. For 
our purposes, it suffices to consider a reduction strategy where a call-by-value redex {Xx.M)V 
is reduced in a context that does not cross a A. 

Next let us define a translation (_) from Ay to to Xp which is the identity on types {{a) = 
a) and type contexts and commutes with all the operators of the terms but on parallel 
composition where it is defined as follows: 



Then it is easy to check the following properties: 

1. If r h M : a then {T),p ■.b^{b^b)V- (M) : a. 

2. {[V/x\M) = [{V)/x\{M). 

3. {E[M]) = {E)[{M)]. 

It follows that if M ^ in Ay then (M ) — t- {N) in Xp. Thus since Xp terminates, Ay must 
terminate too. □ 



{M\N) = {p{M)){N) . 



The translation is also extended to evaluation contexts where in particular: 



{E[[ ] I M]) = {E)M ]){M)] {E[M I [ ]]) = {E)[{p{M))[ ]] 
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C.2 Proof of theorem [5] 



(1) As a preliminary remark notice that if 1/ is a value and D a declaration in Ay then 
FV{V°) C FV{V) and FV{D°) C FV{D). Then we proceed by case analysis on the struc- 
tural congruence by applying the properties of substitutions. 

(2) By induction on the structure of M term of Ay. 

(3) By induction on the typing of F h M : a in Ay. For instance, suppose we derive 
F h Xx.M : yl — > a from T ,x : A\- M : a. Then by inductive hypothesis, T_,x : A \-°-^ M_ : a. 
Also, F, X : A ^ a h""* x : A ^ a , where by definition A ^ a = M{A — t- a). Then we can 
conclude F h"™ let x = Ax.M in x : A — » a as required. 

(4) First, we prove a substitution lemma for Ay, namely: if F, x : ^ h M : a and T \- V : A 
then F h [y^/x]M : a. Then we proceed by induction on the typing of F h D : a in Ay ^. 

(5) Let F and E be one hole contexts composed of parallel compositions and applications, 
respectively: 

F ■.:=[] II (F I M) II (M I F), E ::= [ ] | @{id*,E, M*) . 

If Di is well-typed and reduces then it has the shape: 

let (x = Vy in F[E[@{x, z+)]] 

and X is associated with a value Xy^.D' . Then Di D2 where: 

L>2 = let (x = vy in F[E[[z+ /y+]D']] . 

We extend the read-back translation to F and E by defining: 

[]" = [] (F I M)° = F° I M° (M I Ff = M°\F° 
@(xi, . . . , x„, F, Afi , . . . , M„)" = (• • • (((xi • • • x„)F'')Mf ) • • • M^) . 

Let fj be the (iterated) substitution [y/x]*. We notice that: 

A/i =01 = c7(F°[F°[xz+]]) = ((jF°)[cjF°[(j(xz+)]] . 

Recalling that {\y^ .D'Y = Xy~^ .{D'y , we have that Mi performs as many reductions as there 
are arguments and reduces to (assuming suitable renaming of bound variables): 

M2^{aF")[{aE")[[az+/y+]iaiDr)] ■ 
On the other hand, we notice that: 

D",^{aF")[{aE"M[z^/y+]{Dr)]] ■ 

Knowing that the variables do not appear in the domain or codomain of the substitution 
a, we apply the properties of substitution to check that: 

[az^/y+]{a{Dr)^a{[z+/y+]{Dr). 
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(6) Suppose Di is typable in the monadic fragment Ay'". The fohowing table describes how 
the structure of the readback Mi = {Di)° determines Di up to structural congruence. 



Ml 


Di = 


X 

* 

Xy.M' 

M1M2 
(Ml 1 M2) 


X 

\et x — * \n X 

let {x = V)* in let z = Xy.D' in z and M' = (let {x = V)* in D')° 
let (a; = y)* in @(iVi,7V2) and M, = (let (i = 1/)* in Ar/)°, i = 1, 2 
let (a; = V)* in (iVi | N2) and M, = (let {x = 1/)* in Ni)°, i = 1, 2 



Suppose Ml = D". Notice that Mi is typable because the readback translation preserves 
typing (property 4). Then if Mi reduces, it must have the shape Mi = F[E[{Xx.M')V]], 
where F ::= [ ] | (F | M) || (M | F) and E ::= [ ] || EM \ VE. The reduced term is 
M2 = F[E[[V/x]M']]. Let a be the (iterated) substitution [V"/x]*. By the table above, we 
derive that Di must have the shape let {x = V)* in F'[E'[@{xi,X2)]] with: 

a{F'y =F, a{E'Y = E, 

cr(xi) = Xx.M', fj(x2) = V . 

In particular, we see that the variable xi must occur in the list of let declarations and it must 
be associated with a A-abstraction, say Xx.D' where: 

(let (x = vy in D'y = a{D'y = M' . 

This means that Di can also perform one reduction and reduce to 

D2 = let (x = vy in F'[E'[[x2/x]D']] . 

We observe that: 

D"2^{a{Fr)HErH[x2/x]{Dr)]] 

Knowing that the variable x does not appear in the domain or codomain of the substitution 
a, we apply the properties of substitution to check that: 

a{[x2/x]{D'r) = [a{x2)/x]{a{Dr) = [V/x]M' . 

□ 

C.3 Proof of theorem [7] 

(1) By induction on the proof ofT D : a and case analysis on the definition of D : k. We 
spell out the following case: 

r h" @(M, M+) : J\f{A+ ^a) T h° N+ : A+ 
r h'^ @(@(M,M+),iV+) : a 

We use the following abbreviations: 

A' = Af{A+^a), M' = @{M,M+), V = T,k:K{a). 

We have to show: 

r' let k' = XyM{y, N+) : k in (M' : k') : b 
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By weakening, we derive T,y : A' @{y, N~^) : a. Then by induction hypothesis we have: 

r',y : A^h" {@{y,N+) : k) : b . 
Also, by induction hypothesis on T h"^ M' : A' we derive: 

r, k' : K{A') (M' ■.k'):b. 

Noticing that K(A') = J\f{A' — ?> h) we conclude by applying the rule for the let. 

(2) As a preliminary remark, we notice that structural congruence is preserved by the CPS 
translation, namely D = D' ui A" entails [D : k) = {D' : k). We introduce some additional 
notation for evaluation contexts. We denote with F a one hole context composed of parallel 
compositions: 

F ■.■.= []\F \ M\ M \ F . 

We denote with H an elementary applicative context of the shape @{id* ,[ ],M*). If the 
declaration D in Ay is typable and reduces then it must have the following shape: 

let„ {x = Vy in F[Hi[---Hramx,z+)]---]] 
where the name x is associated with a value Xy^.D'. Then the reduced term is: 

let„ {x = Vr in F[Hi[---R^[[z+/y+]D')]---]] 
The CPS translation of the declaration D has the following shape: 

let, (x = V(^))* in {F[Hi[---Hmmx,z+)]---]]:k) 
Recalling that the CPS translation distributes over parallel composition, we define: 

[]:k=[], {F\M):k = {F:k)\ (M : k), (M \ F) : k = {M : k) \ {F : k) . 
Then we have: 

F[Hi[---Hmmx,z+)]---]]:k ={F:k)[ let^ k^ = Xy.{Hi[y] : k) \n 

leti k2 = Xy.{H2[y] : ki) in 

leti km = Xy.{Hm[y] ■ km-i) in 

@{x,Z+,km) ] 

Recalling that ip{Xy^ .D') = Xy^ , k.{D' : k), we observe that the CPS translation is ready to 
perform the corresponding reduction. Then we proceed by case analysis on the shape of D' 
to show that the CPS translation reduces to: 

let„ {x = ij{V)r in {F[Hi[---H^[[z+/y+]D']---]]:k) 

1. D' = letu' {x' = V')* in x' . Then the CPS translation performs a first reduction by 
replacing @{x, z~^ ,km) with 

[z+/y+,k^/k]{\eU, {x' = i^{V')r in @{k,x')) . 

If there is no enclosing elementary evaluation context, i.e. m = 0, km = k, we are done. 
Otherwise, the CPS translation performs an additional reduction along the continuation 
k„i. Following this reduction the let definition of km can be removed applying the second 
rule of structural congruence. 
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2. D' = lev (x' = V')* in @(M',M'+). Then the CPS translation performs a reduction 
replacing @{x, ,km) with 

[2+/y+,fc„/A:](let„. {x' = ij{V')Y in (@(M',M'+) : k)) . 

3. D' = let„/ (x' = y')* in (Mi | M2). In this case, the typing requires that there are no 
enclosing elementary evaluations contexts, i.e. m = 0, km = k. The CPS translation 
performs a reduction replacing @{x, ,km) with 

[z+/y+,km/k]{\etu' {x = i>{V')y in (Mi : k) \ (M2 : k)) . 
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